BBS in a Box 7/BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso/Files/Hyper/Me-Mz/MegaSort Stack.cpt/MegaSort Stack/card_3255.txt

Text File | 1990-12-13 | 7KB | 504 lines

-- card: 3255 from stack: in
-- bmap block id: 0
-- flags: 4000
-- background id: 2571
-- name:


-- part 2 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=316 top=31 right=53 bottom=435
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Sort Item 1
----- HyperTalk script -----
on mouseUp
  set cursor to watch
  Put "megaSort(fld unsorted," & quote & "," & quote & ",return," & quote & "f=1,t=n" & quote & ") into fld sorted" into fld command
  put megaSort(fld unsorted,",",return,"f=1,t=n") into fld sorted
  set cursor to hand
end mouseUp



-- part 3 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=315 top=61 right=83 bottom=434
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Sort Item 2
----- HyperTalk script -----
on mouseUp
  set cursor to watch
  Put "megaSort(fld unsorted," & quote & "," & quote & ",return," & quote & "f=2,t=n" & quote & ") into fld sorted" into fld command
  put megaSort(fld unsorted,",",return,"f=2,t=n") into fld sorted
  set cursor to hand
end mouseUp



-- part 4 (field)
-- low flags: 01
-- high flags: 0001
-- rect: left=305 top=95 right=243 bottom=507
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 256
-- line height: 16
-- part name:


-- part 7 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=420 top=258 right=317 bottom=508
-- title width / last selected line: 0
-- icon id / first selected line: 1020 / 1020
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Notes on Numbers
----- HyperTalk script -----
on mouseUp
  push card
  visual effect dissolve
  go to card id 7917
end mouseUp




-- part contents for background part 4
----- text -----
-4359,3839
279,679
34,-87
-1961,-4393
4079,454
2611,3832
-571,-1123
-1538,3016
2207,2588
-2434,-4730
-4063,434
4870,118
-2778,-4893
-3309,1021
2167,958
-2079,-3456
-1748,4133
4555,89
-396,-4749
-1475,2822
170,1812
-1690,-1779
-2467,486
4980,4336
-1419,-1079
2676,4437
1881,1259
-4292,-262
-4912,2824
550,1193
-448,-1179
3398,3801
855,819
-222,-3593
-3206,2794
4327,1960
-1597,-3282
4910,3239
4483,3670
-4785,-3943
-606,3366
1783,1253
-4001,-3064
2167,2140
3930,2212
-2225,-2296
336,4750
2103,3675
-2249,-2969
3066,2959
2207,2674
-4319,-831
18,4360
4151,157
-1848,-59
4296,4297
2479,2479
-1481,-2183
3978,4933
3315,4514
-3348,-2414
2004,2465
1106,3445
-1443,-4632
3918,2637
2251,-1191
-4963,-4481
4127,1534
-1078,-523
-182,2208
4103,1827
-3257,-4058
2220,4757
1500,-347
-3236,2653
270,1445
4114,-2862
-978,3924
1095,2878
-2691,-2555
2787,2813
1660,-4333
-4889,-1593
4174,1011
-4887,-1584
1590,344
4267,4509
-3375,-1211
3232,4217
2664,-4588
-1850,3404
4920,761
-608,-2269
2023,4639
1979,1778
-1932,-2085
1139,3456
1865,-2246
-2130,1007
2915,2053
-3421,-1935
861,3643
610,-3563
-4585,4584
2540,3825
-2604,-1292
1588,569
91,-1907
-715,3442
282,3933
-1202,-4208
4033,2129
4371,-513
-4905,1948
1974,887
-2424,-1854
3904,3546
636,1790
-3003,-2219
1990,2837
1613,-2404
-4413,1931
2248,3406
-554,-4140
1249,2849
4826,-2314
-2312,2733
1474,640
-1098,-4383
3781,880
340,-3741
-1234,2847
1318,-3170
-2294,1671
4894,1112
-1856,-1468
3292,4190
1603,-2652
-2487,4369
3609,4887
-2280,-4160
3318,2970
3534,-1947
-125,738
4298,1286
-654,-3034
2978,138
-1065,-280
2193,31
2855,-3087
-648,502
2187,3356
-1249,-4075
946,2936
3014,-1379
-190,2288
3334,-3933
-3503,4296
1051,4667
-2183,-1722
2441,2727
3346,-1031
-4498,3889
4616,-3808
-3343,1735
2911,841
-1845,-160
1540,118
-4791,-1765
1624,2931
230,-621
-4418,830
787,3465
-3592,-2189
4708,3483
-3106,-1505
1473,1819
3459,-3973
-3263,2879
3074,-4456
-4402,4915
3085,-3401
-4428,275
540,4129
-1414,-1179
3180,4813
-4485,-4823
1510,3122
4199,-4346
-1535,393
3586,-4348
-1478,3420
462,-3848
-3109,600
4291,1662
-4153,-105
3406,247
-2528,-2926
2505,3316
-1793,-3647


-- part contents for background part 5
----- text -----
-4963,-4481
-4912,2824
-4905,1948
-4889,-1593
-4887,-1584
-4791,-1765
-4785,-3943
-4585,4584
-4498,3889
-4485,-4823
-4428,275
-4418,830
-4413,1931
-4402,4915
-4359,3839
-4319,-831
-4292,-262
-4153,-105
-4063,434
-4001,-3064
-3592,-2189
-3503,4296
-3421,-1935
-3375,-1211
-3348,-2414
-3343,1735
-3309,1021
-3263,2879
-3257,-4058
-3236,2653
-3206,2794
-3109,600
-3106,-1505
-3003,-2219
-2778,-4893
-2691,-2555
-2604,-1292
-2528,-2926
-2487,4369
-2467,486
-2434,-4730
-2424,-1854
-2312,2733
-2294,1671
-2280,-4160
-2249,-2969
-2225,-2296
-2183,-1722
-2130,1007
-2079,-3456
-1961,-4393
-1932,-2085
-1856,-1468
-1850,3404
-1848,-59
-1845,-160
-1793,-3647
-1748,4133
-1690,-1779
-1597,-3282
-1538,3016
-1535,393
-1481,-2183
-1478,3420
-1475,2822
-1443,-4632
-1419,-1079
-1414,-1179
-1249,-4075
-1234,2847
-1202,-4208
-1098,-4383
-1078,-523
-1065,-280
-978,3924
-715,3442
-654,-3034
-648,502
-608,-2269
-606,3366
-571,-1123
-554,-4140
-448,-1179
-396,-4749
-222,-3593
-190,2288
-182,2208
-125,738
18,4360
34,-87
91,-1907
170,1812
230,-621
270,1445
279,679
282,3933
336,4750
340,-3741
462,-3848
540,4129
550,1193
610,-3563
636,1790
787,3465
855,819
861,3643
946,2936
1051,4667
1095,2878
1106,3445
1139,3456
1249,2849
1318,-3170
1473,1819
1474,640
1500,-347
1510,3122
1540,118
1588,569
1590,344
1603,-2652
1613,-2404
1624,2931
1660,-4333
1783,1253
1865,-2246
1881,1259
1974,887
1979,1778
1990,2837
2004,2465
2023,4639
2103,3675
2167,2140
2167,958
2187,3356
2193,31
2207,2588
2207,2674
2220,4757
2248,3406
2251,-1191
2441,2727
2479,2479
2505,3316
2540,3825
2611,3832
2664,-4588
2676,4437
2787,2813
2855,-3087
2911,841
2915,2053
2978,138
3014,-1379
3066,2959
3074,-4456
3085,-3401
3180,4813
3232,4217
3292,4190
3315,4514
3318,2970
3334,-3933
3346,-1031
3398,3801
3406,247
3459,-3973
3534,-1947
3586,-4348
3609,4887
3781,880
3904,3546
3918,2637
3930,2212
3978,4933
4033,2129
4079,454
4103,1827
4114,-2862
4127,1534
4151,157
4174,1011
4199,-4346
4267,4509
4291,1662
4296,4297
4298,1286
4327,1960
4371,-513
4483,3670
4555,89
4616,-3808
4708,3483
4826,-2314
4870,118
4894,1112
4910,3239
4920,761
4980,4336


-- part contents for background part 6
----- text -----
megaSort(fld unsorted,",",return,"f=1,t=n") into fld sorted

-- part contents for card part 4
----- text -----
Clicking on the above buttons will show how a record can be broken into different fields and each field sorted independently.

Note:  There are 200 records being sorted by numerical value.